home *** CD-ROM | disk | FTP | other *** search
/ Windows 6-Pak - Disc 4 / Windows 6-Pak (InfoMagic) (Disc 4) (1999).ISO / Text-Chat-Addins / C-Script.exe / AddOns / mp3-play.mrc < prev    next >
Encoding:
Text File  |  1997-11-11  |  1.5 KB  |  40 lines
  1. ;Feel free to put any extra information on your addon here if you like! Just make sure
  2. ;you put a ";" before your text like I have here.
  3. ;
  4. ;MP3 Player addon for C-Script...
  5.  
  6. on 1:LOAD: {
  7.   mp3setup
  8. }
  9. #mp3-play on
  10. ctcp 1:MP3: {
  11.   set %mp3-play.mp3 %mp3-play.mp3dir $+ $2
  12.   if ($exists(%mp3-play.mp3) == $false) { echo 2 -a * /mp3: unable to find $2 | halt }
  13.   run -n %mp3-play.mp3
  14. }
  15. #mp3-play end
  16. alias mp3play-help {
  17.   echo 12 -a MP3 Player Help:
  18.   echo 6 -a /mp3 plays a mp3 file
  19.   echo 6 -a /mp3setup re-sets MP3 Player
  20.   echo 6 -a /mp3play [on|off] turns the MP3 Player on or off
  21. }
  22. alias mp3setup {
  23.   :loop
  24.   set %mp3-play.mp3dir $$?="Enter location of .mp3 files! (eg. c:\sounds)"
  25.   if ($findfile(%mp3-play.mp3dir,*.mp?,1) == $null) { echo 4 -a No .mp3 files found in %mp3-play.mp3dir $+ ! Please try again... | goto loop }
  26.   else { set %mp3-play.mp3dir %mp3-play.mp3dir $+ \ | echo 4 -s MP3 Player Setup Complete! }
  27. }
  28. alias mp3 {
  29.   set %mp3-play.txt $1-
  30.   set %mp3-play.mp3 $dir="Pick a MP3 File..." [ %mp3-play.mp3dir $+ *.mp? ]
  31.   if (%mp3-play.txt != $null) { say $1- }
  32.   if (%mp3-play.mp3 != $null) { run -n %mp3-play.mp3 }
  33.   if ($server != $null && $right($active,6) != Status && $left($active,1) != @ && %mp3-play.mp3 != $null) { .ctcp $active MP3 $nopath(%mp3-play.mp3) }
  34. }
  35. alias mp3play {
  36.   if ($1 == on) { enable #mp3-play | halt }
  37.   elseif ($1 == off) { disable #mp3-play | halt }
  38.   else { echo 4 -a Usage: /mp3play [on|off] | halt }
  39. }
  40.